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?xml version="l .0" ?> 

! DOCTYPE record SYSTEM " /XML /Me t a/ 1 met a . dtd" > 

record name =" STUDENT- SUMMARY- INFORMATION 11 archi tecture= " s3 90 " align="l"> 
<field type^'pic" align="l M spec="999999" size="6"> 
<name>ID-NUMBER</name> 

<association>ID-NUMBER</association> 

</field> 

<field type="pic" align="l" spec="999999" size="6"> 

<name>PIN</name> 

<association>PIN</association> 
</field> 

<field type="pic" align="l" spec= "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX" size="35"> 

< name >NAME < /name > 
<association>NAME</association> 

</field> 

< array size="3"> 

< name >ADDRESS</ name > 

<associ at ion>ADDRESS< /association 

< field type="pic" align="l" spec = "XXXXXXXXXXXXXXXXXXXXXXXXX" size="25"> 
<name >ADDRESS< /name> 
<association>ADDRESS</association> 

</field> 
</array> 

<field type="pic ,, align="l" spec= " 999X999X9999" size=»12"> 

< name > PHONE - NUMBER< /name> 
<association>PHONE-NUMBER</association> 

</field> 

<field type="pic" align* "I 11 spec=" 999X99X9999" size= M ll"> 

< name > SOC I AL - SECURITY - NUMBER< / name > 

<association>SOCIAL-£ECURITY-NUMBER</association> 
</field> 

<field type = "pic" align="l" spec="999" shifts" -2" size="3"> 
< name > GRADE - POINT - AVERAGE< /name > 
<associ at ion>GRADE- POINT- AVERAGE< / association 

</field> 
< struct > 

< name > BALANCE S< /name> 
<association>BALANCES</association> 
<field type="packed" aligns"!" size="3"> 
<name>TUITION</name> 
<association>TUITION</association> 
</field> 

<field type=" packed" align= ,, l" size="3"> 
<name>HOUSING</name> 
<associ at ion>HOU£ING< /association 
</field> 
</struct> 
</record> 
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package com.touchnet .beangen; 



import com.touchnet .base.* ; 
import j ava . io . * ; 
import java.util.*; 

/** 

* This will provide the functionality that is common to all generated JavaBeans that 

* map into legacy structures 
* 

* Creation date: (12/14/99 1:28:08 PM) 

* ©author: Gary Murphy 
*/ 

public abstract class AbstractStructure 
implements St ructurelnterf ace 

private String architecture; 
private StructTreeNode root = null; 

private EinaryRenderingEngine engine = new BinaryRenderingEngine () ; 
private j ava . lang . String metadataName ; 

/** 

* Create the base constructure for Java objects that wrapper legacy data 

* structures 

*i 

public AbstractStructure ( ) 

{ 

super () ; 

} 

/** 

* Access the name of the architecture that the underlying binary data 

* represents 
*/ 

public String getArchitecture ( ) 
throws TException 

{ 

return architecture; 

} 

/** 

* This will access an array within the structure. It will be returned as 

* an array of some concrete instance of this AbstractStructure. Even if 

* the array is of a single field, it will still be represented as a 

* structure that simply contains a single element. If the requested 

* element is not an array, this will throw an exception 
*/ 

public St ructurelnterf ace [] getArray { String name) 
throws TException 

AbstractSt ruct ureTreeNode node = getNode (name) ; 

if (node instanceof ArrayTreeNode) 

ArrayTreeNode arrayNode = (ArrayTreeNode ) node ; 

return arrayNode .getArray () ; 

} 

//If this isn't an array node, then we tried to access a non-array 
// as an array 

throw new TException ( "Attempt to access a non-array element as an array"); 

} 

/** 

* Access the binary rendering engine 
* 

* Creation date: (1/3/00 1:11:03 PM) 

* ©return com . touchnet . base . BinaryRenderingEngine 

*/ 

protected BinaryRenderingEngine getEngmeO 
{ 

if (null == engine) 

engine = new BinaryRenderingEngine () ; 
return engine; 

} 
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/** 

* Access the named field within the component 
*/ 

public String getField (String name) 
throws TException 

AbstractStructureTreeNode node = ge t Node (name) ; 
if {node instanceof FieldTreeNode) 

FieldTreeNode fieldNode = (FieldTreeNode) node ; 
return fieldNode .getFieldO .toStringO ; 

} 

// It's not a field, so this is an exception 

throw new TException ( "Attempt to access a non-field element as a field"); 
} 

/** 

* Access the name of the metadata that describes this component 
* 

* Creation date: (2/29/00 11:24:58 AM) 

* ©return java. lang. String 
*/ 

public String getMetadataName () 
{ 

return metadataName; 

} 

* This will access the named node, starting at the root of the embedded tree 
* 

* Creation date: (2/29/00 11:43:09 AM) 

* dreturn com. touchnet .beangen .AbstractStructureTreeNode 

* ©paratn name java . lang . String 

* ©exception com. touchnet .base .TException The exception description. 
* / 

protected AbstractStructureTreeNode getNode (String name) 
throws TException 

StringTokenizer tokenizer = new StringTokenizer (name, "/") ; 
return getNode (tokeni zer, getRootO); 

} 

j* * 

* This will access the named node, as a child of the current node. The name ^ 

* is the next element in the tokenizer. If the name child doesn't exist, this 

* will throw an exception 

* Creation date: (2/29/00 11:43:09 AM) 

* ©return com. touchnet . beangen .AbstractStructureTreeNode 

* @param name java . lang . String 

* ^exception com. touchnet .base .TException The exception description. 
*/ 

protected AbstractStructureTreeNode 

getNode (StringTokenizer tokenizer, AbstractStructureTreeNode current) 
throws TException 

if ( J tokenizer .hasMoreElements () ) 

return current; // The current node is the requested node 

String child s= tokeni zer . nextToken {) ; 

// Look for the name among the child nodes 

int count = current .get Chi IdCount () ; 
for (int i = 0; i < count; 
{ 

AbstractStructureTreeNode node = 

(AbstractStructureTreeNode) current .get Chi IdAt (i) ; 
if (node .getName 0 . equals (child) } 

return getNode (tokenizer , node); 

} 
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// The name didn't match any of the children 

throw new TException ("The child of ' "+ current .getName ()+" 1 named 1 "+ 

child+" ' does not exist"); 

} 

J * * 

* This will access the root node for the legacy data layout 
+ 

* Creation date: (1/3/00 12:56:48 PM) 

* ©return com . touchnet .beangen.StructTreeNode 
*/ 

protected StructTreeNode getRootO 

{ 

return root; 
} 

/+* 

* This will read the binary contents of the input stream and 

* place it in the appropriate nodes of the tree 

*/ 

public void read ( InputStream stream) 
throws TException 

{ 

/ / Code not shown 
} 

/** 

* Access the name of the architecture that describes the underlying 

* binary data. 
*/ 

public void setArchitecture (String name) 
throws TException 

{ 

architecture = name; 
return; 

} 

J -k * 

* Set the array for this level in the data structure 
*/ 

public void setArray (String name, Structurelnterf ace [] child) 
throws TException 

AbstractStructureTreeNode node = g et Node (name) ; 
if (node instanceof ArrayTreeNode) 

ArrayTreeNode arrayNode - (ArrayTreeNode) node; 

arrayNode . setArray ( child) ; 

} 

// If this isn't an array node, then we tried to access a non-array 
// as an array 

throw new TException ( "Attempt to access a non-array element as an array"); 
} 

/** 

* Update the named field with the value 
*/ 

public void set Field (String name, String value) 
throws TException 

AbstractStructureTreeNode node = getNode (name) ; 
if (node instanceof FieldTreeNode) 

{ 

FieldTreeNode fieldNode = (FieldTreeNode ) node ; 
LegacyField field = fieldNode . getField () ,- 
field. setValue (value) ; 

} 
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// It's not a field, so this is an exception 

throw new TException ( "Attempt to access a non-field element as a field"); 



} 

I * * 

* Access the name of the metadata that describes this component 
* 

* Creation date: (2/29/00 11:24:58 AM) 

* @param name java. lang. String 
*/ 

public void setMetadataName (String name) 
{ 

metadataName = name; 
return; 

} 

I ** 

* This will access the root node for the legacy data layout 
* 

* Creation date: (1/3/00 12:56:48 PM) 

* @param rootNode com . touchnet .beangen . StructTreeNode 
*/ 

protected void setRoot (StructTreeNode rootNode) 
{ 

root = rootNode; 
return; 

} 

/** 

* This will write the binary contents back to the 
*/ 

public void write (Output St ream stream) 
throws TException 

{ 

// Code not shown 

} 



Fig. 5A 



package com.touchnet .beangen .generated; 

import com .touchnet .beangen. * ; 
import com. touchnet .base .* ; 
/** 

* This was automatically generated 2/29/00 12:38:47 PM 
*/ 

public class Student Summarylnf ormat ion 
extends AbstractStructure 

{ 

* Student Summarylnf crmation constructor comment. 
*' 

public Student Summarylnf ormat ion (} { 
super 0 ; 

} 

public String getAddress (int index) 
throws TException 

Structurelnterface [3 array = get Array {"/ADDRESS") ; 
return array[index] .getField ( " / " ) ; 

} 

public String getGradePointAverage ( ) 
throws TException 

return getField ( " /GRADE -PCI NT -AVERAGE" ) ; 

} 

public String getHousingO 
throws TException 

{ 

return getField (" /BALANCES/HOUSING" ) ; 
} 

public String getldNumber () 
throws TException 

{ 

return getField { " /ID -NUMBER" ) ; 

} 

public String getName{) 
throws TException 

{ 

return getField ( "/NAME" ) ; 
} 

public String getFhoneNumber (} 
throws TException 

return getField { " / PHONE-NUMBER" ) ; 
} 

public String get PINO 
throws TException 

{ 

return getField ( 11 /PIN" ) ; 
} 

public String getSocialSecurityNumber () 
throws TException 
{ 

return getField ( " /SOCIAL -SECURITY -NUMBER" ) ,- 
} 

public String getTuition{) 
throws TException 

{ 

return getField ( " /BALANCES /TUITION" ) , 
} 

public void setAddress (int nth, String value) 
throws TException 

{ 

Structurelnterface!] array = get Array ("/ADDRESS" ) ; 
arraytnth] . setFieldt"/". value) ,- 
} 

public void setGradePointAverage (String value) 
throws TException 

{ 
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setField ( " / GRADE - POINT - AVERAGE 11 , value) ; 

} 

public void setHousing (String value) 
throws TException 

{ 

setField {" /BALANCES /HOUSING" , value) ; 

} 

public void set I dNumber (String value) 
throws TException 

{ 

setField ( " /ID -NUMBER" , value) ; 

} 

public void setName (String value) 
throws TException 
{ 

setField ("/NAME" , value) ; 

public vcid set PhoneNumber (String value) 
throws TException 
{ 

setField ( " /PHONE -NUMBER" , value) ; 
} 

public void setPIN (String value) 
throws TException 
{ 

setField ("/PIN" , value) ; 

public void set SocialSecurityNumber (String value) 
throws TException 

{ 

setField ("/SOCIAL-SECURITY-NUMBER" , value) ; 
} 

public void setTuition (String value) 
throws TException 

setField ( " /BALANCES/TUITION" .value) ; 
} 

J 
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/* -- Published APIs and data types */ 

typedef long lxsHandle; 

IxsHandle lxsOpen(char *id, char *host, 
unsigned short port) ; 
int IxsClose {lxsHandle handle) ; 

int lxsRead (lxsHandle handle, char *name, void *data, unsigned long length) ; 

int IxsWrite (lxsHandle handle, char *name, void *data, unsigned long length) 

int IxsCommit (lxsHandle handle); 

int IxsRollback (lxsHandle handle) ; 

void IxsGetLastNameRead (IxsHandle handle, char *name) ; 
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package com .touchnet .util .base; 



1 1 * * * < CO py r ight 
//* 

//* Copyright <c) 2000 

//* TouchNet Information Systems, Inc. 

//* All Rights Reserved 

//* 

//* This program is an unpublished copyright work of TouchNet Information 
//* Systems, Inc. of Lenexa, KS . The program, all information disclosed 
//* and the matter shown and described hereon or herewith are confidential 
//* and proprietary to TouchNet Information Systems, Inc. 
//* 

J J ic + it< CO py r i ght > *+* + *****-************************************** + **************** 
//* 

//* Change Log: 

//* $Log: BinaryRenderingEngine. java $ 

//* Revision 1.4 2000/07/19 10:36:38 glm 

//* 

import com. touchnet .util .base . * ; 
import com. touchnet .util . * ; 
import java. math. Biglnteger; 
/ 



* This is a utility object that will manage the bit/byte manipulation 

* for a variety of data conversions. 
*/ 

public class BinaryRenderingEngine 

{ 

/** 

* Construct an object that will render byte arrays in a variety 

* of formats 

*/ 

public BinaryRenderingEngine ( ) 

{ 

super () ; 
} 

/** 

* Access the value that is used when there is a rendering error 
* 

* ©return byte 
*/ 

public byte getErrorByte ( ) 

{ 

return errorByte; 
} 

/** 

* Return a copy of one of these. 
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* ©return COM .touchnet . xmlhost . BinaryRenderingEngine 
*/ 

public static BinaryRenderingEngine get Instance () 

{ 

if (instance == null) 

instance = new BinaryRenderingEngine () , 
return instance; 

} 

/** 

* This is called when there is a formatting exception such as a 

* string representation of a number that overflows the number of 

* bytes that number can handle 
* 

* ©par am data byte [3 

* @param exception java . lang .NumberFormat Except ion 

*' ■ v 

public void handl eFormat Except ion (byte [} data, IllegalArgumentException exception) 

// For now, we just set the bytes to some pre-defined value. We may want 
//to make this a JavaBean that fires an formatting exception event to 
// the listeners . _____ 



byte err = getErrorByte {) ; 

for (int i - 0; i < data. length; ++i) 

datali] = err; 
return; 

} 

j-k * 

* This will parse the string into a long 
* 

* Creation date: (7/12/00 11:21:57 AM) 

* ©return long 

* ©param number java. lang. String 
*/ 

private long parseLong (String number) 

{ 

if (o == number . length () ) 
return 0; 

// The Java parseLong () is pretty stupid. It can't handle a leading ' + ', so I need 
// an explicit check for that. 

if (' + ' == number .charAt (0) ) 

number = number . substring ( 1 ) ; 

return Long . parseLong (number) ; 

} 

* Render a Java String from a series of bytes with 7-bit ASCII values 
* 

* ©return java . lang . String 

* ©param datum byte[j 
*/ 

public String renderAsciiString (byte [] datum) 
{ 

int size = datum, lengths- 
chart] array = new char [size]; 
for {int i = 0; i < size; ++i) 

array [i] = (char) renderPrintableAscii (datum [i] , ■ '); 

return String .valueOf (array) ; 
} 

/** 

* This will return a byte array containing 7-bit ASCII values generated 

* from the number passed 
* 

* ©return byte [] 

* ©param value int 

* ©param size int 

* ©param pad char 

*/ 

public byte[] renderAsciiString (int value, int size, char pad) 

{ 

byte[] buffer = new byte [size]; 

int offset ~ 0; 

boolean negative = false; 

if ({value < 0) && (pad != * ')) 
{ 

value = 0 - value; 
negative - true; 
buffer [off set++] = (byte) ' - ' ; 
} 

String string = Integer ,toString (value) ; 
int length = string. lengtht) ; 
for (; offset < size - length; ++offset) 

buffer [of f set] = (byte)pad; // Pad on left if needed 

byte[] stringBytes = string. getBytes () ; 
for (int i = 0; offset < size; ++offset, ++i) 

buffer [of f set] - stringBytes [i] , 
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return buffer; 

} 

/*■* 

* This will render the two bytes in the array into an 

* integer and return the string rendering of that 
* 

* ©return java . lang . String 

* @param raw byte[] 
*/ 

public String renderBigEndianl6Bit (byte [] raw) 

{ 

short byteO = ( short ) raw [0] ; // Allow this to sign-extend 
short bytel = (short) (raw [1] & OxOOFF) ; 

short value = 

(short) { (byteO << 8) 
+ bytel 
) ; 

return String .valueOf (value) ; 
} 

/** 

* This will render the string numeric into two bytes 
* 

* @param java . lang, String 

* ©return raw byte[] 

*/ 

public byte[] renderBigEndianl6Bit (String datum) 

{ 

byte[] raw = new byte [2] ; 

short value = 0 ; 

try 

{ 

value = parseShort {datum) ; 

raw[0] = (byte) ( (value & OxOOOOFFOO) >> 8) ; 
raw[l] = (byte) { value & OxOOOOOOFF) ; 

} 

catch (NumberFormatException exception) 
{ 

handleFormatException(raw, exception) ; 

} 

return raw; 
} 



* This will take a series of bytes which are expected to be 

* ASCII characters representing numbers, For example - 
* 

{ , '6' , '9' , '6' , '0' } 



* would be -6 960. It will return an int. 
* 

* ©return int 

* ©param raw byte[] 
*/ 

public int renderlntegerFromAsciiBytes (byte [] raw) 

{ 

String number = renderAsciiZString (raw) .trim {) ; 

if .equals (number) ) // All white space is considered a valid zero integer 
return 0; 

int value = 0; 
try 

{ 
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value = parselnt (number) ; 

} 

catch (NumberFcrmat Except ion exception) 

{ 

handle Format Exc ept i on ( r aw , new Numbe r Format Except i on {)) ; 
return -1; 

} 

return value; 

} 



I *★ 

* This will render bytes representing a packed decimal field into 

* a string representation. This is a helper routine that works 

* for both signed and unsigned packed values 
* 

* ©return java . lang . String 

* @param raw byte[] 

* @param isSigned boolean 
*/ 

private String renderPacked (byte [] raw, boolean isSigned, int offset) 

{ 

char signCharacter = 1 ' ; // Assume no sign 

StringBuffer buffer = new StringBuf f er ( ) ; 

boolean minus = false; 

// Take a peek at the offset compared to the length of the raw data and see 
// where the decimal point goes. 

int append = 0; 

int insertAfter = -1 ; 

int digits = (raw. length << 1) - 1; 

if (offset > 0) // Append only 

append = offset; 
else 

{ 

//We have a negative offset, the decimal will either be to the left or 
// somewhere in the middle. 

insertAf ter = digits -f offset; // Add because offset is negative 
if (insertAfter < 0) // The offset means only leading zeros... 

{ 

buffer . append ('.'); 
for (int i = insertAfter; i < 0; ++i) 
buffer . append COM ; 

} 

} // else 

int rlndex = -1; // Index into the raw data 

int nibble = 0; 

boolean secondNibble = true; 

for (int i = 0; i < digits; ++i) 

{ 

if (secondNibble) // Bump input byte every other ni 

++r Index; 
secondNibble = \ secondNibble ; 

// Wait for the interation in which we have to stuff the extra decimal 
// point . 

if (i == insertAfter) 

buffer . append ('.'); 
if (secondNibble) 

nibble = raw [rlndex] & OxOOOOOOOF; 
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else 

nibble = (raw [rlndex] >> 4) & OxOOOOOOOF; 
switch (nibble) 



{ 



case 


0: 


buf fer. append ( 


0' ) ; 


break; 


case 


1 : 


buffer . append ( 


1 ' ) , 


break; 


case 


2: 


buf fer .append ( 


2' ) , 


break; 


case 


3 : 


buffer .append ( 


3' ) 


break ; 


case 


4 : 


buffer . append ( 


4 ' ) 


• break ; 


case 


5: 


buffer .append ( 


'5' } 


• break ; 


case 


6 : 


buffer . append ( 


'6' ) 


• break; 


case 


7: 


buffer . append ( 


171 ) 


• break; 


case 


8: 


buf fer .append { 


'8') 


• break; 


case 


9: 


buffer . append { 


.91 ) 


; break ; 



default : 

handleFormat Except ion (raw, 

new IllegalArgumentException ( "Invalid value in data")); 
return 11 [data format error] " ; 
} / / swi t ch 
} // for 

// Now handle the last nibble which is the sign. 

nibble = raw [rlndex] & 0x000000 OF ; 
switch (nibble) 

{ 

case OxOA: 
case OxOC: 
case OxOE: 
case OxOF: 

break; 
case OxOD: 
case OxOB: 

minus = true ; 

break ; 
default: 

{ 

handleFormatException (raw, 

new IllegalArgumentException ("Invalid value in data")); 
return " [data format error] " ; 

} 

} 

// Append any additional trailing zeros that are a result of the decimal shift 
// in the type descriptor 

for (int i = 0; i < append; ++i) 
buf fer .append ( 1 0 1 ) ; 

String rendered = buf f er . toString ( ) ; 
if (isSigned && minus) 

rendered = + rendered; 

return rendered; 

} 

* This is a helper method that will render PIC templates that have been pre -determined 

* to be numeric. It will handle both EBCDIC or ASCII input numerics. 
* 

* ©return byte [] 

* ©param raw java . lang . String 

* @param template byte[] 

* @param offset int 

* ©param isAscii boolean 
*/ 

private byte [] renderPacked (String raw, int size, int offset, boolean isSigned) 

{ 

byte [] buffer = new byte [size] ; 

int shift =0; // This is the decimal place shift that we find in the 

// data. It is used to reconcile the offset parm 
boolean decimal = false; // ... until we hit a decimal point, then it is true 
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boolean minus = false; 

byte [] userdata = raw .getBytes ( ) ; 

byte[] numeric = new byte [userdata . length] ; // Just the numeric part of the data 
int numSize =0; // Count of just the numerics in the user data 

for(int i = 0; i < userdata . length; 

{ 

switch (userdata [i] ) 

{ 

case (byte) * 0 ' : 

case (byte) 1 1 ' : 

case (byte) 1 2 ' : 

case (byte) ' 3 1 : 

case (byte) '4 1 : 
case (byte) ! 5 1 : 
case (byte) *6 1 : 
case (byte) ' 7 ' : 
case (byte) ' 8 ' : 
case (byte) ' 9 ' : 

numeric [numSize++] = (userdata [i] ) ; 

if (decimal) -+ + shift; 

break; 

case (byte) 1 - ' : 

minus = true; 

break ; 
case (byte) 1 + ' : 

break ; 
case (byte) ' . 1 : 

decimal = true; 

break; 
} // switch 
} // for 

// Now we have the digits separated from the sign and decimal point. Now 
// we have to normalize the decimal offset and the digit count with the 
// template. What makes this additionally complex is the observation that 
// there can be truncation on either side of the user data if the shift 
// overflows the template. Consider the following examples: 

// 

// Assume: 

// 



// 


template = 


99999 with shift -2 


(via PIC 999V99) 


// 










// 


Userdata 


Answer 






// 










// 


1230 


23000 


(truncation 


on left) 


// 


123 


12300 






// 


12 .3 


01230 






// 


1.23 


00123 






// 


.123 


00012 


(truncation 


on right) 



// 

// At this point in the code, we have the user data filtered out 

// into a the string ,, 123". We need to align the decimal point 

// logically based on the shifts in the template minus the logical 

// shifts from the explicit decimal point in the data. 

int index = numSize - ((size << 1) - 1) - offset 
int [] value = new int [2] ; 
for (int i = 0; i < size-1; ++i) 

{ 

for (int j =0; j < 2; ++j) 

{ 

if (index < 0) 

value [j] = 0; 
else 

if (index < numSize) 

value [j] = numeric [index] & OxOOOOOOOF; 
else 

value [j] = 0; 
++ index ; 



- shift; 

Fig. 13F 



4 ► 



buffer [i] = (byte) ( (value [0] « 4) | value [1]); 

} 



//Do the last byte as a special case since it contains the sign nibble 



if {index < 0) 

value [j] = 0; 
else 

if (index < numSize) 

value [j] = numeric [index] & OxOOOOOOOF; 
else 

value [ j ] = 0 ; 
++ index; 
} 

int sign = OxOC; // Plus 
if (isSigned && minus) 
sign = OxOD; 

buffer [size-1] = (byte) ( (value [0] « 4) | sign) ; 
return buffer; 



for (int j = 0; j < 2; 




